/*------------------------------------------------------------------------*/
/* Sample code of OS dependent controls for FatFs                         */
/* (C)ChaN, 2012                                                          */
/*------------------------------------------------------------------------*/

#include <stdio.h>
#include <stdlib.h>		/* ANSI memory controls */

#include "atom.h"
#include "atommutex.h"

#include "../ff.h"


#if _FS_REENTRANT
/*------------------------------------------------------------------------*/
/* Create a Synchronization Object */
/*------------------------------------------------------------------------*/
/* This function is called in f_mount function to create a new
/  synchronization object, such as semaphore and mutex. When a FALSE is
/  returned, the f_mount function fails with FR_INT_ERR.
*/

int ff_cre_syncobj (	/* 1:Function succeeded, 0:Could not create due to any error */
	BYTE vol,			/* Corresponding logical drive being processed */
	_SYNC_t *sobj		/* Pointer to return the created sync object */
)
{
	int ret;

	/* Allocate space for mutex object from heap */
	if ((*sobj = malloc (sizeof(ATOM_MUTEX))) == NULL)
	{
		printf ("SYSCALL: Failed to allocate mutex\n");
		ret = 0;
	}
	/* Initialise mutex */
	else if (atomMutexCreate(*sobj) != ATOM_OK)
	{
		printf ("SYSCALL: Failed to create mutex\n");
		free (*sobj);
		ret = 0;
	}
	/* Success */
	else
	{
		ret = 1;
	}

	return ret;
}



/*------------------------------------------------------------------------*/
/* Delete a Synchronization Object                                        */
/*------------------------------------------------------------------------*/
/* This function is called in f_mount function to delete a synchronization
/  object that created with ff_cre_syncobj function. When a FALSE is
/  returned, the f_mount function fails with FR_INT_ERR.
*/

int ff_del_syncobj (	/* 1:Function succeeded, 0:Could not delete due to any error */
	_SYNC_t sobj		/* Sync object tied to the logical drive to be deleted */
)
{
	int ret;

	/* Delete the mutex */
	if (atomMutexDelete (sobj) != ATOM_OK)
	{
		printf ("SYSCALL: Failed to delete mutex\n");
		ret = 0;
	}
	else
	{
		/* Deallocate object space on heap */
		free (sobj);
		ret = 1;
	}

	return ret;
}



/*------------------------------------------------------------------------*/
/* Request Grant to Access the Volume                                     */
/*------------------------------------------------------------------------*/
/* This function is called on entering file functions to lock the volume.
/  When a FALSE is returned, the file function fails with FR_TIMEOUT.
*/

int ff_req_grant (	/* TRUE:Got a grant to access the volume, FALSE:Could not get a grant */
	_SYNC_t sobj	/* Sync object to wait */
)
{
	int ret;

	int status;

	if ((status = atomMutexGet (sobj, _FS_TIMEOUT)) != ATOM_OK)
	{
		printf ("SYSCALL: Failed to get mutex (%d)\n", status);
		ret = FALSE;
	}
	else
	{
		ret = TRUE;
	}

	return ret;
}



/*------------------------------------------------------------------------*/
/* Release Grant to Access the Volume                                     */
/*------------------------------------------------------------------------*/
/* This function is called on leaving file functions to unlock the volume.
*/

void ff_rel_grant (
	_SYNC_t sobj	/* Sync object to be signaled */
)
{
	if (atomMutexPut (sobj) != ATOM_OK)
	{
		printf ("SYSCALL: Error putting mutex\n");
	}
}

#endif




#if _USE_LFN == 3	/* LFN with a working buffer on the heap */
/*------------------------------------------------------------------------*/
/* Allocate a memory block                                                */
/*------------------------------------------------------------------------*/
/* If a NULL is returned, the file function fails with FR_NOT_ENOUGH_CORE.
*/

void* ff_memalloc (	/* Returns pointer to the allocated memory block */
	UINT msize		/* Number of bytes to allocate */
)
{
	return malloc(msize);
}


/*------------------------------------------------------------------------*/
/* Free a memory block                                                    */
/*------------------------------------------------------------------------*/

void ff_memfree (
	void* mblock	/* Pointer to the memory block to free */
)
{
	free(mblock);
}

#endif
